home *** CD-ROM | disk | FTP | other *** search
/ SVM Mac 1 / CD-ROM N°1.iso / Utilitaires / Programmation⁄Infos / UCB Logo 3.0 / logolib / dequeue < prev    next >
Encoding:
Text File  |  1994-04-25  |  132 b   |  9 lines  |  [TEXT/JV01]
  1. to dequeue :queue
  2. local "result
  3. make "result first thing :queue
  4. make :queue butfirst thing :queue
  5. output :result
  6. end
  7.  
  8. bury "dequeue
  9.